wwwwwwp
wwwwwwp
wwwwwwwwwwwwwwwwwwwwwwwwww
wwwwww
wwwww
wwwww
wwwww
wwwww
wwwwwwwwwwwwwwwwwwwwwwwwwwww
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
wwwwwwwwp
Browse Viewer
Browse
D:\_nautcd\extras\browse.avi
 INFO","browseMovieSize","
wwwwwww
wwwwwww
Browse
D:\_nautcd\extras\browse.avi
 INFO","browseMovieSize","
System
Arial
BW Times
Arial
HxuJlxA
Arial
BW TIMES
browseViewer
NautilusCD Browse
page "Browse Viewer"
closeWindow
ptLastBrowsePos
moved
Window
	untranslateWindowMessage 0x0112
moved
4point ptLastBrowsePos
ptLastBrowsePos
shown
closeWindow
	untranslateWindowMessage 0x0112
moved
4point ptLastBrowsePos
shown
4logical bBrowseInit
ncd256
NautilusCD
NautCD
CDBSE&File
&Open...	Ctrl+O
&Save	Ctrl+S
Save &As...
saveas
&Import...
import
&Export...
export
Print Set&up...
printsetup
&Print Pages...	Ctrl+P
printpages
Prin&t Report...
printreport
Send &Mail...
sendmail
&Run...
E&xit	Alt+F4
&Edit
&Undo	Ctrl+Z
Cu&t	Ctrl+X
&Copy	Ctrl+C
&Paste	Ctrl+V
paste
C&lear	Del
clear
Select &All	Shift+F9
selectall
Select Pa&ge	Shift+F12
selectpage
&Size to Page	F11
sizetopage
F&ind...	F5
Re&place...
replace
Aut&hor	F3
author
&Text
&Character...	F6
character
&Paragraph...	F7
paragraph
&Regular	Ctrl+Space
regular
&Bold	Ctrl+B
&Italic	Ctrl+I
italic
&Underline	Ctrl+U
underline
Stri&keout	Ctrl+K
strikeout
Superscrip&t/Subscript
superscriptSubscript
&Normal Script
normalscript
Su&bscript	Ctrl+L
subscript
Su&perscript	Ctrl+Shift+L
superscript
&Show Hotwords	F9
showhotwords
&Page
&Next	Alt+Right
&Previous	Alt+Left
previous
&First	Alt+Up
first
&Last	Alt+Down
&Back	Shift+F2
&History...	Ctrl+F2
history
N&ew Page	Ctrl+N
newpage
&Help
&Contents	F1
contents
Status &Bar	F12
statusbar
browseViewer
browseViewer
Browse Viewer
enterPage
Pause
pauseBrowse
buttonClick
playBrowse
buttonClick
goToPage
y6browseViewer
szBrowseClip
pauseBrowse
dwBrowseMovieLength
NegoToPage
W(setBrowseBar
playing
buttonClick
Go to page
slideBox
slider
rSide
slideBar
buttonClick
slideBar
myEnabled
StepBack
buttonClick
buttonStillDown
StepForward
buttonClick
buttonStillDown
browseViewerStage
goToPage
buttonClick
42,42,2442,1842
mediaBounds
browseViewerStage
goToPage
buttonClick
buttonClick
B"goToPage"
42,42,2442,1842
mediaBounds
enterPage
""	-- *** simple trap *** --
dwBrowseDelta,dwBrowseSeekTo,dwLastX
szBrowseClip
4logical bBrowsePlaying
Q <> 
D = (mmStatus 
clip 
browseViewer() = "
KillTimer(windowHandle 
targetWindow,43)
B"play"
 = mmPosition 
wseMovieLength,dwBrowseTravel,
b(rSide(
lSide(
B"stepback") - width(
j(dwBrowseMovieLength, \
b(0,((
)) / 
		mmSeek 
 wait
mmNotify
playBrowse mediaLength,ptMediaSize
szBrowseCmdString,szBrowseClip
dwBrowseMovieLength
gwBrowseTimer
4logical bBrowseInit,bFirstBrowse
4point ptLastBrowsePos
gwPageNum
$BrowseMovieSize
]SysSuspend,bSysMediaSuspend
 = 43
			ptBrowseMovieSize = discIniString("DISC INFO","browseMovieSize","160,120",16)
initBrowseViewer 
initBrowseSlider 
		bSysSuspend = 
 = sysMediaSuspend
","",256)
"No" && appName() && "Disc found 
volume" && romDrive()
closeBrowse 
o= default
			mmSource 
clip 
"Could 
xinitialize 
			mmEndPoint 
		mmOpen 
		translateWindowMessage 
windowHandle 
"browseViewer" 
			on 0x0112 
browseCommand 
			on 0x0005 
noSize 
			mmSeek 
xmmVisible 
mmShow 
stage "browseViewerStage"
setBrowseBar
B"goToPage" 
			mmPlay 
y notify 
SetTimer(
targetWindow,
,1000,0)
ShowWindow(
BringWindowToTop(
pauseBrowse
	mmPause 
,dwBrowseInterval
dwCurPos
 = mmPosition 
Z >= 1
mmStep 
key = 
;keyDownArrow
mmIsOpen 
		mmClose 
isOpen 
KillTimer(
			defaultPosition 
O	-- *** see note 
)the 
*** --
-- *** 
handler *** --
mmNotify mediaRef,cmd,result
szViewer,szPage,szStage
% = "
o = "successful") -- 
 = "superceded")
windowhandle 
cmd = 
ptSize
szSysInfo[]
gwShortName
BkgndSize
Zstack stStageBounds
gwOffset
,szPageName
 = 60
- = "
] && "
statusBar
		ptBkgndSize = 
mediaSize 
Hheight(
") + 
		-- SEE NOTE BELOW ABOUT objTop HANDLERS
lSide 
B"slideBar" 
rSide(
B"stepback" 
B"stepforward" 
(width(
@) + 
"slideBox" 
) - \
") + 
B"stepForward") - 
			on 0x0113 
		parentWindow 
 = "0,0"
screenResolution()
	-- *** 
a persistent property 
saved 
	*** --
	-- *** "
O", but that gives 
rather annoying 
centering itself		*** --
	-- *** 
restored 
a minimized state, so...
*** --
,dwBrowseStart,dwBrowseTravel
	linkDLL user
 / 16)
"slider") - 
,dwTraveled
B"slidebar" 
newLSide
-- N.B. 
LIS AN O/S KEYWORD, HENCE 
INSTEAD
newTop
newRSide
newBot
newWidth
newHeight
myPath
szTemp
* = "\"
hwnd,wMsg,wParam,lParamLo,lParamHi
 = 0xF060
SysInfo
*+"+"+
dwBrowseSeekTo
KillTimer
dwBrowseDelta
y6browseViewer
szBrowseClip
dwLastX
bBrowsePlaying
Playing
buttonDown
+&,!>
+&,!Y
+&,!>
+&,!Y
+&,!Y
+&,!Y
dwBrowseTravel
dwBrowseSeekTo
dwBrowseDelta
y6browseViewer
szBrowseClip
dwLastX
rSide
dwBrowseMovieLength
width
lSide
stepback
buttonStillDown
mmNotify
.&+	+E
w,	#?
w,	#?
W(setBrowseBar
initBrowseSlider
browseViewerStage
Could not initialize Browse Movie
closeBrowse
browseViewer
DISC INFO
qtromDrive
szBrowseClip
noSize
160,120
browseMovieSize
Disc found in volume
dwBrowseMovieLength
Browse Viewer
bBrowseInit
goToPage
BringWindowToTop
bFirstBrowse
Browse
browseCommand
ShowWindow
xSetTimer
browseMovie
default
	1appName
initBrowseViewer
=PdiscIniString
wBrowseTimer
playBrowse
szBrowseClip
pauseBrowse
+&,!"
browseViewerStage
szBrowseClip
browseViewer
dwBrowseMovieLength
W(setBrowseBar
dwBrowseInterval
keyDown
KillTimer
szBrowseClip
center
browseViewer
bBrowseInit
wBrowseTimer
closeBrowse
browseViewerStage
KillTimer
wPageNum
goToPage
browseViewer
successful
mmPause
bBrowseInit
mmClose
W(setBrowseBar
mmPlay
Browse Viewer
wBrowseTimer
mmNotify
<+U!!
.&,	7
.&,	7
lSide
lSide
setBrowseBar
browseViewerStage
szSysInfo
stepforward
pause
goToPage
slideBar
rSide
browseViewer
slideBox
width
objTop
width
screenResolution
Browse
statusBar
objTop
wShortName
height
stepForward
Browse Viewer
ptLastBrowsePos
stepback
initBrowseViewer
+&,!J
rSide
browseViewer
dwBrowseStart
dwBrowseMovieLength
slider
width
slideBar
dwBrowseTravel
SetTimer
KillTimer
dwBrowseInterval
initBrowseSlider
+&,!Y
+&,!Y
lSide
szBrowseClip
browseViewer
dwBrowseStart
dwBrowseMovieLength
slidebar
dwBrowseTravel
setBrowseBar
lSide
lSide
objTop
objTop
rSide
width
rSide
height
width
width
height
height
<+U!!
statusBar
enterBook
myPath
browseViewer
closeBrowse
IbrowseCommand
browseCommand
noSize
browseViewer
closeBrowse
IbrowseCommand
browseCommand
noSize
Browse
D:\_nautcd\extras\browse.avi
 INFO","browseMovieSize","